# -*- coding: utf-8; mode: snippet -*-
# name: mark-active region-beginning
# key: mark-active-begin
# contributor: Shuguang Sun
# --
(if mark-active (region-beginning) (point-min))